home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwrh15.dir / 00167_Script_167 < prev    next >
Text File  |  1994-11-15  |  2KB  |  75 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currMM, seeAlsoNess
  4.   set seeAlsoNess = FALSE
  5.   set currMM = "FLWWT"
  6.   
  7.   preLoadCast 1,7
  8.   
  9.   puppetSprite 21, TRUE
  10.   puppetSprite 22, TRUE
  11.   puppetSprite 23, TRUE
  12.   puppetSprite 11, TRUE
  13.   set the immediate of sprite 23 to TRUE
  14.   set the stretch of sprite 23 to FALSE
  15. end startMovie
  16.  
  17. on saveLocals
  18.   global lastMovie, lastFrame, nowFrame
  19.   set lastFrame = nowFrame
  20.   set lastMovie = "FLWRH15"
  21. end saveLocals
  22.  
  23. on buttonState
  24.   global FrankNav, bFlag
  25.   
  26.   if rollover(11) then
  27.     set the castNum of sprite 11 to 1082
  28.     if the mouseDown then
  29.       set the castNum of sprite 11 to 1083
  30.     end if
  31.   else
  32.     set the castNum of sprite 11 to 1081
  33.   end if
  34.   
  35.   if rollover(6) then
  36.     rollCheck
  37.   else
  38.     set pos = 0
  39.     cursor -1
  40.   end if
  41.   
  42.   if (the mouseV > 400) or (bFlag = TRUE) then
  43.     doState
  44.   end if
  45. end buttonState
  46.  
  47. on rollCheck
  48.   global right, left, forw, pos
  49.   if the mouseH>=446 and the mouseH<=537 and the mouseV>180 and the mouseV<420 then
  50.     if right = 1 then
  51.       set pos = 3
  52.       cursor [1065,1066]
  53.     else
  54.       set pos = 0
  55.       cursor [1071,1072]
  56.     end if
  57.   else if the mouseH>=217 and the mouseH<=308 and the mouseV>180 and the mouseV<420 then
  58.     if left = 1 then
  59.       set pos = 1
  60.       cursor [1069,1070]
  61.     else
  62.       set pos = 0
  63.       cursor [1071,1072]
  64.     end if
  65.   else if the mouseH>=307 and the mouseH<=447 and the mouseV>180 and the mousev<=420 then
  66.     if forw = 1 then
  67.       set pos = 2
  68.       cursor [1067,1068]
  69.     else
  70.       set pos = 0
  71.       cursor [1071,1072]
  72.     end if
  73.   end if
  74. end rollCheck
  75.